home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2002 January / january_2002.iso / Piposh Special / Piposh / FRITZ1.DXR / 00157.ls < prev    next >
Encoding:
Text File  |  2004-12-06  |  492 b   |  20 lines
  1. on exitFrame
  2.   global soundspath, fxpath, bullets, effectspath, pwr
  3.   if the machineType = 256 then
  4.     soundspath = the moviePath & "sounds/"
  5.   else
  6.     soundspath = the moviePath & "sounds:"
  7.   end if
  8.   sound playFile 1, effectspath & "Machak.aif"
  9.   if not soundBusy(1) then
  10.     pwr = [300, 40, 30, 30]
  11.     put 300 into field "power"
  12.     bullets = 5
  13.   else
  14.     pwr = [1500, 40, 30, 30]
  15.     put 1500 into field "power"
  16.     bullets = 500
  17.   end if
  18.   sound playFile 4, fxpath & "psymus.aif"
  19. end
  20.